unit TestUnit;

interface

function TestFunction: Integer;

implementation

function TestFunction: Integer;
begin
  Result:= 66;
end;

end.
